Top 10k strings from Granja (1985)(MicroHobby)(es).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Covertapes / Sinclair ZX Spectrum - Covertapes - [TAP] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 XX,YY;"  ";
   2 GRANJA    
   1 v         :
   1 granja    
   1 Y(P)=YY+V:
   1 Y(P)=Y(P)+V(P):
   1 XX+H,YY+V;"  ";
   1 X(P)=XX+H:
   1 X(P)=X(P)+H(P):
   1 X(P),Y(P);C$;
   1 X(P),Y(P);"  ";
   1 PU=PU+GD*500
   1 PU=PU+GD*1000
   1 PRESENTACION
   1 OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOWWWWWWWWWWWWWWWWWWWWWWOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOm
   1 N2=Y-Y(P):
   1 N1=X-X(P):
   1 MOVIMIENTO
   1 H(P),V(P):
   1 ;"TE ENCUENTRAS ENCERRADO EN UNA  GRANJA EN LA QUE LOS CERDOS SE  HAN SUBLEVADO E INTENTAN TERMI- NAR CONTIGO. PARA EVITARLO HAS  DE DIRIGIRTE HACIA LAS LLAVES   Y METERLAS EN LAS CERRADURAS.   POR CADA TOMATE QUE CHAFES, TU  PUNTUACION AUMENTARA. PUEDES    ALEJAR LOS CERDOS DE TI SI LOS  EMPUJAS CON UN TOMATE PERO OJO  PORQUE SI UN CERDO TOCA LA BE-  LLOTA TU PUNTUACION DISMINUYE.";
   1 ;"PUNTOS=  ";PU:
   1 ;"PULSA UNA TECLA PARA JUGAR"
   1 ;"PANTALLA= ";GD
   1 ;"CARGANDO"''
   1 ;"***LA GRANJA***";
   1 ;" VIDAS= ";VI,
   1 ;" PARA  EL  CASSETTE ":
   1 ;"   GRANJA  BASIC/Auto 1":
   1 ;"       G A M E   O V E R      ":
   1 ,Y(P);"  ":
   1 +H,YY+V;"  ";
   1 (XX+H,YY+V)
   1 (X(P)+H(P),Y(P)+V(P))